﻿Public Class CLDS_AR_Multi
    Private _RRINO As Integer
    Private _RRRuleset As Integer
    Private _RRComplete As String
    Private _RRLength As Double
    Private _RRFill As Double
    Private _RRLock As Double
    Private _RRFlags As Integer
    Private _RRIgnore As Integer
    Public Property RRINO() As Integer
        Get
            Return _RRINO
        End Get
        Set(ByVal value As Integer)
            _RRINO = value
        End Set
    End Property
    Public Property RRRuleset() As Integer
        Get
            Return _RRRuleset
        End Get
        Set(ByVal value As Integer)
            _RRRuleset = value
        End Set
    End Property
    Public Property RRComplete() As String
        Get
            Return _RRComplete
        End Get
        Set(ByVal value As String)
            _RRComplete = value
        End Set
    End Property
    Public Property RRLength() As Double
        Get
            Return _RRLength
        End Get
        Set(ByVal value As Double)
            _RRLength = value
        End Set
    End Property
    Public Property RRFill() As Double
        Get
            Return _RRFill
        End Get
        Set(ByVal value As Double)
            _RRFill = value
        End Set
    End Property
    Public Property RRLock() As Double
        Get
            Return _RRLock
        End Get
        Set(ByVal value As Double)
            _RRLock = value
        End Set
    End Property
    Public Property RRFlags() As Integer
        Get
            Return _RRFlags
        End Get
        Set(ByVal value As Integer)
            _RRFlags = value
        End Set
    End Property
    Public Property RRIgnore() As Integer
        Get
            Return _RRIgnore
        End Get
        Set(ByVal value As Integer)
            _RRIgnore = value
        End Set
    End Property
End Class
